home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1995 September / macformat-028.iso / mac / Shareware City / Applications / ezGenes 0.2 PPC / Source 0.2 / FamTree.r < prev    next >
Encoding:
Text File  |  1995-04-19  |  3.7 KB  |  168 lines  |  [TEXT/R*ch]
  1. #include "Types.r"
  2. #include "SysTypes.r"
  3. #include "MacAppTypes.r"
  4.  
  5. #if qDebug
  6. include "Debug.rsrc";
  7. #endif
  8.  
  9. include "MacApp.rsrc";
  10. include "Dialog.rsrc";
  11. include "Printing.rsrc";
  12.  
  13. include "FamTree.Rsrc";
  14.  
  15. #define mPerson        5
  16. #define mDisplay    6
  17.  
  18. #define cAncestor    1201
  19. #define cDescendant    1202
  20. #define cAddParents    1211
  21. #define cAddSpouse    1212
  22. #define cAddChild    1213
  23. #define cEditPerson    1218
  24. #define cDelePerson    1219
  25. #define cDispFather    1220
  26. #define cDispMother    1221
  27. #define cDispSpouse    1222
  28. #define cDispChild    1223
  29. #define cGoto        1229
  30.  
  31. #define sVersion        "0.2"
  32. #define sDate            "April 1995"
  33.  
  34. resource 'vers' (1, purgeable) {
  35.     0x0,
  36.     0x20,
  37.     final,    /*beta  or  final*/
  38.     0x0,
  39.     verUS,
  40.     sVersion,
  41.     sVersion" of "sDate"\n©1995 by M.A. Eyler"
  42. };
  43.  
  44. resource 'cmnu' (mApple) {
  45.     mApple,
  46.     textMenuProc,
  47.     AllEnabled,
  48.     enabled,
  49.     apple,
  50.     {
  51.     "About ^0…",        noIcon, noKey, noMark, plain, cAboutApp,
  52.     "-",                noIcon, noKey, noMark, plain, nocommand
  53.     }
  54. };
  55.  
  56. resource 'cmnu' (mFile,nonpurgeable) {
  57.     mFile,
  58.     textMenuProc,
  59.     AllEnabled,
  60.     enabled,
  61.     "File",
  62.     {
  63.     "New",                noIcon, "N",    noMark, plain, cNew;
  64.     "Open…",            noIcon, "O",    noMark, plain, cOpen;
  65.     "-",                noIcon, noKey,    noMark, plain, nocommand;
  66.     "Close",            noIcon, "W",    noMark, plain, cClose;
  67.     "Save",                noIcon, "S",    noMark, plain, cSave,
  68.     "-",                noIcon, noKey,    noMark, plain, nocommand;
  69.     "Ancestors",        noIcon, noKey,    noMark, plain, cAncestor;
  70.     "Descendants",        noIcon, noKey,    noMark, plain, cDescendant;
  71.     "-",                noIcon, noKey,    noMark, plain, nocommand;
  72.     "Quit",                noIcon, "Q",    noMark, plain, cQuit
  73.     }
  74. };
  75.  
  76. resource 'cmnu' (mEdit,nonpurgeable) {
  77.     mEdit,
  78.     textMenuProc,
  79.     AllEnabled,
  80.     enabled,
  81.     "Edit",
  82.     {
  83.     "Undo",                noIcon, "Z",    noMark, plain, cUndo;
  84.     "-",                noIcon, noKey,    noMark, plain, nocommand;
  85.     "Cut",                noIcon, "X",    noMark, plain, cCut;
  86.     "Copy",                noIcon, "C",    noMark, plain, cCopy;
  87.     "Paste",            noIcon, "V",    noMark, plain, cPaste;
  88.     "Clear",            noIcon, noKey,    noMark, plain, cClear;
  89.     "-",                noIcon, noKey,    noMark, plain, nocommand;
  90.     "Select All",        noIcon, "A",    noMark, plain, cSelectAll
  91.     }
  92. };
  93.  
  94. resource 'cmnu' (mPerson,nonpurgeable) {
  95.     mPerson,
  96.     textMenuProc,
  97.     AllEnabled,
  98.     enabled,
  99.     "Person",
  100.     {
  101.     "Add Parents",        noIcon, noKey,    noMark, plain, cAddParents;
  102.     "Add Spouse",        noIcon, noKey,    noMark, plain, cAddSpouse;
  103.     "Add Child",        noIcon, noKey,    noMark, plain, cAddChild;
  104.     "-",                noIcon, noKey,    noMark, plain, nocommand;
  105.     "Edit",                noIcon, "E",    noMark, plain, cEditPerson;
  106.     "Delete",            noIcon, "D",    noMark, plain, cDelePerson
  107.     }
  108. };
  109.  
  110. resource 'cmnu' (mDisplay,nonpurgeable) {
  111.     mDisplay,
  112.     textMenuProc,
  113.     AllEnabled,
  114.     enabled,
  115.     "Display",
  116.     {
  117.     "Father",            noIcon, "F",    noMark, plain, cDispFather;
  118.     "Mother",            noIcon, "M",    noMark, plain, cDispMother;
  119.     "Spouse",            noIcon, "1",    noMark, plain, cDispSpouse;
  120.     "Child",            noIcon, "2",    noMark, plain, cDispChild;
  121.     "-",                noIcon, noKey,    noMark, plain, nocommand;
  122.     "Go To…",            noIcon, "G",    noMark, plain, cGoto
  123.     }
  124. };
  125.  
  126. resource 'MBAR' (kMBarDisplayed,nonpurgeable) {
  127.     {mApple; mFile; mEdit; mPerson; mDisplay}
  128. };
  129.  
  130. resource 'SIZE' (-1) {
  131.     saveScreen,
  132.     acceptSuspendResumeEvents,
  133.     enableOptionSwitch,
  134.     canBackground,
  135.     MultiFinderAware,
  136.     backgroundAndForeground,
  137.     dontGetFrontClicks,
  138.     ignoreChildDiedEvents,
  139.     is32BitCompatible,
  140.     true,        /* Apple events */
  141.     reserved,
  142.     reserved,
  143.     reserved,
  144.     reserved,
  145.     reserved,
  146.     reserved,
  147. #if qDebug
  148.     500 * 1024,
  149.     300 * 1024
  150. #else
  151.     350 * 1024,
  152.     250 * 1024
  153. #endif
  154. };
  155.  
  156. #if qDebug
  157. resource 'dbug' (kDebugParamsID,purgeable) {
  158. {290, 7, 480, 630},        // [normal=0,0,0,0]Bounding rect for debug window
  159.         4,                 // [normal=1]Debug window font rsrc ID (monaco)
  160.         normal,            // [normal=9]Debug window font size
  161.         normal,            // [normal=120]Number of lines
  162.         90,                // [normal=100]Width of lines in characters
  163.         openInitially,    // [or normal]Do show window at startup
  164.     "Debug Transcript"    // [normal=""]Window title
  165. };
  166. #endif
  167.  
  168.